home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / pcl / src-16f.lha / ldb / globals.h < prev    next >
C/C++ Source or Header  |  1991-11-06  |  1KB  |  69 lines
  1. /* $Header: globals.h,v 1.8 91/10/22 18:38:04 wlott Exp $ */
  2.  
  3. #if !defined(_INCLUDE_GLOBALS_H_)
  4. #define _INCLUDED_GLOBALS_H_
  5.  
  6. #include "lisp.h"
  7.  
  8. #ifndef LANGUAGE_ASSEMBLY
  9.  
  10. extern char *number_stack_start;
  11.  
  12. extern int foreign_function_call_active;
  13.  
  14. #ifdef mips
  15. extern unsigned long saved_global_pointer;
  16. extern unsigned long current_flags_register;
  17. #endif
  18.  
  19. extern lispobj *current_control_stack_pointer;
  20. extern lispobj *current_control_frame_pointer;
  21. #ifndef ibmrt
  22. extern lispobj *current_binding_stack_pointer;
  23. #endif
  24.  
  25. extern lispobj *read_only_space;
  26. extern lispobj *static_space;
  27. extern lispobj *dynamic_0_space;
  28. extern lispobj *dynamic_1_space;
  29. extern lispobj *control_stack;
  30. extern lispobj *binding_stack;
  31.  
  32. extern lispobj *current_dynamic_space;
  33. #ifndef ibmrt
  34. extern lispobj *current_dynamic_space_free_pointer;
  35. extern lispobj *current_auto_gc_trigger;
  36. #endif
  37.  
  38. #else  LANGUAGE_ASSEMBLY
  39.  
  40. /* These are needed by ./assem.s */
  41.  
  42. #ifdef mips
  43. #define EXTERN(name,bytes) .extern name bytes
  44. #endif
  45. #ifdef sparc
  46. #define EXTERN(name,bytes) .global _/**/name
  47. #endif
  48. #ifdef ibmrt
  49. #define EXTERN(name,bytes) .globl _/**/name
  50. #endif
  51.  
  52.  
  53. EXTERN(foreign_function_call_active, 4)
  54.  
  55. EXTERN(current_control_stack_pointer, 4)
  56. EXTERN(current_control_frame_pointer, 4)
  57. #ifndef ibmrt
  58. EXTERN(current_binding_stack_pointer, 4)
  59. EXTERN(current_dynamic_space_free_pointer, 4)
  60. #endif
  61.  
  62. #ifdef mips
  63. EXTERN(current_flags_register, 4)
  64. #endif
  65.  
  66. #endif LANGUAGE_ASSEMBLY
  67.  
  68. #endif _INCLUDED_GLOBALS_H_
  69.